﻿Imports DAO, DTO
Public Class PhieuMuonSachBUS
    Public Function LayDSPhieuMuonTheoDocGia(ByVal ma As Integer) As List(Of Integer)
        Dim dao As New PhieuMuonSachDAO()
        Return dao.LayDSPhieuMuonTheoDocGia(ma)
    End Function

    Public Function ThemPhieuMuonSach(ByVal sql As String) As Integer
        Dim dao As New PhieuMuonSachDAO()
        Return dao.ThemPhieuMuonSach(sql)
    End Function

    Public Function LayDanhSachPhieuMuonSach() As List(Of PhieuMuonSachDTO)
        Dim dao As New PhieuMuonSachDAO()
        Return dao.LayDanhSachPhieuMuonSach()
    End Function

End Class
